[@main000]
<Welcome!>\   \
My name is MentaL, how may i serve you today?\
<Rent a pet *New!*/@rent> | | <Save Bonelord/@save>\

[@0main]
My name is the great <MentaL>, i have been sent here\
to allow you to take a quick advantage with your gifts\
left over from christmas, give me one gift no longer \
two, and i will give you a beast to whom you can take control\
over!\  \
<Use special gift!/@choose> | | <Rent a pet *New!*/@rent> | | <Save pet/@save>\
<Exit/@exit>

[@choose]
#IF
checkitem SpecialGift1 1
#ACT
goto @1
break
#IF
checkitem SpecialGift2 1
#ACT
goto @2
break
#IF
checkitem SpecialGift3 1
#ACT
goto @3
break
#IF
checkitem SpecialGift4 1
#ACT
goto @4
break
#IF
checkitem SpecialGift5 1
#ACT
goto @5
break
#IF
checkitem SpecialGift6 1
#ACT
goto @6
break
#IF
checkitem SpecialGift7 1
#ACT
goto @7
break
#IF
checkitem SpecialGift8 1
#ACT
goto @8
break
#IF
checkitem SpecialGift9 1
#ACT
goto @9
break
#IF
checkitem SpecialGift10 1
#ACT
goto @10
break
#IF
checkitem SpecialGift11 1
#ACT
goto @11
break
#IF
checkitem SpecialGift12 1
#ACT
goto @12
break
#IF
checkitem SpecialGift13 1
#ACT
goto @13
break
#IF
checkitem SpecialGift14 1
#ACT
goto @14
break
#IF
checkitem SpecialGift15 1
#ACT
goto @15
break

#ELSEACT
goto @nogifts

[@nogifts]
Sorry, but you have no specialgifts so  i cannot issue you\
a monster.\
<exit/@exit>

[@canthave]
Sorry, but only one pet at a time :(\
<exit/@exit>

[@1]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift1 1
recallmob WhiteEvilBoar
CLOSE
#ELSEACT
goto @Canthave

[@2]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift2 1
recallmob EvilSnake
CLOSE
#ELSEACT
goto @Canthave


[@3]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift3 1
recallmob EvilApe
CLOSE
#ELSEACT
goto @Canthave


[@4]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift4 1
recallmob Woomataurus
CLOSE
#ELSEACT
goto @Canthave


[@5]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift5 1
recallmob BoneLord
CLOSE
#ELSEACT
goto @Canthave


[@6]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift6 1
recallmob Khazard
CLOSE
#ELSEACT
goto @Canthave


[@7]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift7 1
recallmob MinotaurKing
CLOSE
#ELSEACT
goto @Canthave


[@8]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift8 1
recallmob KingScorpion
CLOSE
#ELSEACT
goto @Canthave


[@9]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift9 1
recallmob DarkDevil
CLOSE
#ELSEACT
goto @Canthave

[@10]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift10 1
recallmob RedThunderZuma
CLOSE
#ELSEACT
goto @Canthave

[@11]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift11 1
recallmob KingHog
CLOSE
#ELSEACT
goto @Canthave

[@12]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift12 1
recallmob CrystalSpider
CLOSE
#ELSEACT
goto @Canthave

[@13]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift13 1
recallmob JinchonCaptain
CLOSE
#ELSEACT
goto @Canthave

[@14]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift14 1
recallmob PossedGuardian
CLOSE
#ELSEACT
goto @Canthave

[@15]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Thanks <$USERNAME> Enjoy the Monster"
take SpecialGift15 1
recallmob WoomaGuardian
CLOSE
#ELSEACT
goto @Canthave

;;-Rent a pet

[@norent]
I am sorry, but this is not available to you.\
<exit/@exit>

[@main]
<Welcome to Rent a Pet!>\  \
Being the great MentaL i have invested my time in our \
new product called rent a pet, depending on your level and\
the amount of cash you have, you can rent up to 5 pets\
to assist you with your leveling! Would you like to see\
whats available to you?\
<Yes please!/@rentcheck> | | <RandoPet/@randopet> | | <Save Bonelord/@save> | | <Exit/@exit>

[@ultrarent111]
Due to recent disconnections i have been forced to remove this\
feature by the elder ragezone council.\
<exit/@exit>

[@ultrarent]
<Welcome to UltraRent>\  \
UltraRent is a new feature here on RaGEZONE, ultrarent is\
the kind of rent which is seen as over the top and only I\
provide them, What makes ultra rent so special is that it\
allows you the chance to rent a boss as a pet!!! Any Level \   
is welcome!\
<Show me the list/@ultralist>  |  |  <exit/@exit>

[@ultralist]
<Here are the current list and prices!>\   \
<Rent/@eviltongs> - (EvilTongs x1) - 200,000 Gold\
<Rent/@web> - (WhiteEvilBoar x1) - 250,000 Gold\
<Rent/@iwt> - (IncarnatedWT x1) - 750,000 Gold\
<Exit/@exit>

;;;free

[@free]
<Here are the current list of free pets>\   \
<Rent/@3free> - (IncarnatedZT x1) - 0 Gold\
<Rent/@2free> - (KingScorpion x1) - 0 Gold\
<Rent/@1free> - (RedThunderZuma x1) - 0 Gold\
<Rent/@0free> - (Spidbat x5) - 0 Gold\
<Rent/@00free> - (ES x1 WEB x1 ) - 0 Gold\
<Exit/@exit>

[@00free]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Remember <$USERNAME> the EXP is X4 this weekend only"
recallmob WhiteEvilBoar 0
recallmob EvilSnake 0
BREAK
#ELSEACT
goto @error

[@0free]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Remember <$USERNAME> the EXP is X4 this weekend only"
recallmob spidBat 0
recallmob spidBat 0
recallmob spidBat 0
recallmob spidBat 0
recallmob spidBat 0
BREAK
#ELSEACT
goto @error

[@1free]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Remember <$USERNAME> the EXP is X4 this weekend only"
recallmob RedThunderZuma 1
BREAK
#ELSEACT
goto @error

[@2free]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Remember <$USERNAME> the EXP is X4 this weekend only"
recallmob KingScorpion 1
BREAK
#ELSEACT
goto @error

[@3free]
#IF
CHECKSLAVECOUNT < 1
#ACT
SENDMSG 4 "Remember <$USERNAME> the EXP is X4 this weekend only"
recallmob IncarnatedZT 1
BREAK
#ELSEACT
goto @error

[@eviltongs]
#IF
checkgold 200000
CHECKSLAVECOUNT < 1
#ACT
take gold 200000
recallmob EvilTongs
BREAK
#ELSEACT
goto @error

[@web]
#IF
checkgold 250000
CHECKSLAVECOUNT < 1
#ACT
take gold 250000
recallmob WhiteEvilBoar
BREAK
#ELSEACT
goto @error

[@iwt]
#IF
checkgold 750000
CHECKSLAVECOUNT < 1
#ACT
take gold 750000
recallmob IncarnatedWT1
BREAK
#ELSEACT
goto @error

;;;

[@rentcheck]
#IF
checkjob Wizard
#ACT
goto @rentwiz
#IF
checkjob Taoist
#ACT
goto @renttao
#IF
checkjob Warrior
#ACT
goto @rentwarr

[@rentwiz]
#IF
checklevelex > 49
#ACT
goto @rentwiz50
break
#IF
checklevelex > 44
#ACT
goto @rentwiz45
break
#IF
checklevelex > 39
#ACT
goto @rentwiz40
break
#IF
checklevelex > 34
#ACT
goto @rentwiz35
break
#IF
checklevelex > 29
#ACT
goto @rentwiz30
break
#IF
checklevelex > 25
#ACT
goto @rentwiz26
break
#IF
checklevelex > 21
#ACT
goto @rentwiz22
break
#ELSEACT
goto @norent

[@rentwiz22]
<Wizard Options 22> - Here is a list of what you can rent!\  \
<Rent/@omafighter> - (OmaFighter x5) - 20,000 Gold\
<Rent/@cavemaggot> - (CaveMaggot x5) - 20,000 Gold\  \
<main/@main> - <exit/@exit>


[@rentwiz26]
<Wizard Options 26> - Here is a list of what you can rent!\  \
<Rent/@blackmaggot> - (BlackMaggot x5) - 50,000 Gold\
<Rent/@omawarrior> - (OmaWarrior x5) - 50,000 Gold\
Level <22/@rentwiz22>  | | <main/@main> - <exit/@exit>


[@rentwiz30]
<Wizard Options 30> - Here is a list of what you can rent!\  \
<Rent/@tongs> - (Tongs x5) - 50,000 Gold\
<Rent/@wedgemoth> - (WedgeMoth x5) - 50,000 Gold\
<Rent/@redboar> - (RedBoar x5) - 50,000 Gold\  \
Level <22/@rentwiz22> - <26/@rentwiz26> | | <main/@main> - <exit/@exit>


[@rentwiz35]
<Wizard Options 35> - Here is a list of what you can rent!\  \
<Rent/@venomspider> - (VenomSpider x5) - 100,000 Gold\  \
Level <22/@rentwiz22> - <26/@rentwiz26> -  <30/@rentwiz30> | | <main/@main> -  <exit/@exit>


[@rentwiz40]
<Wizard Options 40> - Here is a list of what you can rent!\  \
Level <22/@rentwiz22> - <26/@rentwiz26> -  <30/@rentwiz30> - <35/@rentwiz35>  | | <main/@main> -  <exit/@exit>


[@rentwiz45]
<Wizard Options 45> - Here is a list of what you can rent!\  \
<Rent/@frosttiger> - (Frost Tiger x2 ) - 150,000 Gold\
<Rent/@crystalspider> - (Crystal Spider x1) - 350,000 Gold\
<Rent/@spidbat> - (Spidbat x5) - 150,000 Gold\
<Rent/@gangspider> - (Gang Spider x5) - 150,000 Gold\  \
Level <22/@rentwiz22> - <26/@rentwiz26> - <30/@rentwiz30> - <35/@rentwiz35> - <40/@rentwiz40> | | <main/@main> - <exit/@exit>

[@rentwiz50]
<Wizard Options 50> - Here is a list of what you can rent!\  \
Level <22/@rentwiz22> - <26/@rentwiz26> - <30/@rentwiz30> - <35/@rentwiz35> - <40/@rentwiz40> - <45/@rentwiz45> | | <main/@main> - <exit/@exit>


[@renttao]
<Taoist>\
I am sorry but this not supported for your class\
<exit/@exit>

[@rentwarr]
<Warrior>\
I am sorry but this not supported for your class\
<exit/@exit>


;;Rents

[@omafighter]
#IF
checkgold 20000
CHECKSLAVECOUNT < 1
#ACT
take gold 20000
recallmob OmaFighter
recallmob OmaFighter
recallmob OmaFighter
recallmob OmaFighter
recallmob OmaFighter
BREAK
#ELSEACT
goto @error

[@redboar]
#IF
checkgold 50000
CHECKSLAVECOUNT < 1
#ACT
take gold 50000
recallmob RedBoar
recallmob RedBoar
recallmob RedBoar
recallmob RedBoar
recallmob RedBoar
BREAK
#ELSEACT
goto @error

[@cavemaggot]
#IF
checkgold 20000
CHECKSLAVECOUNT < 1
#ACT
take gold 20000
recallmob CaveMaggot
recallmob CaveMaggot
recallmob CaveMaggot
recallmob CaveMaggot
recallmob CaveMaggot
BREAK
#ELSEACT
goto @error

[@blackmaggot]
#IF
checkgold 50000
CHECKSLAVECOUNT < 1
#ACT
take gold 50000
recallmob Blackmaggot
recallmob Blackmaggot
recallmob Blackmaggot
recallmob Blackmaggot
recallmob Blackmaggot
BREAK
#ELSEACT
goto @error

[@omawarrior]
#IF
checkgold 50000
CHECKSLAVECOUNT < 1
#ACT
take gold 50000
recallmob OmaWarrior
recallmob OmaWarrior
recallmob OmaWarrior
recallmob OmaWarrior
recallmob OmaWarrior
BREAK
#ELSEACT
goto @error

[@tongs]
#IF
checkgold 50000
CHECKSLAVECOUNT < 1
#ACT
take gold 50000
recallmob Tongs
recallmob Tongs
recallmob Tongs
recallmob Tongs
recallmob Tongs
BREAK
#ELSEACT
goto @error

[@wedgemoth]
#IF
checkgold 50000
CHECKSLAVECOUNT < 1
#ACT
take gold 50000
recallmob WedgeMoth
recallmob WedgeMoth
recallmob WedgeMoth
recallmob WedgeMoth
recallmob WedgeMoth
BREAK
#ELSEACT
goto @error

[@venomspider]
#IF
checkgold 100000
CHECKSLAVECOUNT < 1
#ACT
take gold 100000
recallmob Venomspider
recallmob Venomspider
recallmob Venomspider
recallmob Venomspider
recallmob Venomspider
BREAK
#ELSEACT
goto @error

[@frosttiger]
#IF
checkgold 150000
CHECKSLAVECOUNT < 1
#ACT
take gold 150000
recallmob FrostTiger
recallmob FrostTiger
BREAK
#ELSEACT
goto @error

[@crystalspider]
#IF
checkgold 350000
CHECKSLAVECOUNT < 1
#ACT
take gold 350000
recallmob CrystalSpider
BREAK
#ELSEACT
goto @error

[@gangspider]
#IF
checkgold 150000
CHECKSLAVECOUNT < 1
#ACT
take gold 150000
recallmob GangSpider
recallmob GangSpider
recallmob GangSpider
recallmob GangSpider
recallmob GangSpider
BREAK
#ELSEACT
goto @error

[@spidbat]
#IF
checkgold 150000
CHECKSLAVECOUNT < 1
#ACT
take gold 150000
recallmob SpidBat
recallmob SpidBat
recallmob SpidBat
recallmob SpidBat
recallmob SpidBat
BREAK
#ELSEACT
goto @error

[@error]
Sorry, either you have no cash or already have a pet.\
<exit/@exit>

;;;

[@randopet]
<Welcome to RandoPet!>\   \
RandoPet is a new system in which any class could rent a\
random pet for the fee of <50,000 Gold> but the pet is totally\
random and is up to you if you wish to have a pet or not! but\
i must stress, its possible that you may not be given one!\  \
<Collect RandoPet!/@randocheck> | | <Main/@main>

[@randocheck]
#IF
checkgold 50000
CHECKSLAVECOUNT < 1
#ACT
take gold 50000
goto @randogive
#ELSEACT
goto @error

[@randogive]
#IF
random 20
#ACT
goto @rando1
break

#IF
random 20
#ACT
goto @rando2
break

#IF
random 20
#ACT
goto @rando3
break

#IF
random 20
#ACT
goto @rando4
break

#IF
random 20
#ACT
goto @rando5
break

#IF
random 20
#ACT
goto @rando6
break

#IF
random 20
#ACT
goto @rando7
break

#IF
random 20
#ACT
goto @rando8
break

#IF
random 20
#ACT
goto @rando9
break

#IF
random 20
#ACT
goto @rando10
break

#IF
random 20
#ACT
goto @rando11
break

#IF
random 20
#ACT
goto @rando12
break

#IF
random 20
#ACT
goto @rando13
break

#IF
random 20
#ACT
goto @rando14
break

#IF
random 20
#ACT
goto @rando15
break

#IF
random 20
#ACT
goto @rando16
break

#IF
random 20
#ACT
goto @rando17
break

#IF
random 20
#ACT
goto @rando18
break

#IF
random 20
#ACT
goto @rando19
break

#IF
random 20
#ACT
goto @rando20
break

#ELSEACT
goto @randogive

[@rando1]
#ACT
recallmob Zombie1

[@rando2]
#ACT
recallmob RedBoar

[@rando3]
#ACT
recallmob BlackBoar

[@rando4]
#ACT
recallmob OmaWarrior

[@rando5]
#ACT
recallmob BoneSpearman

[@rando6]
#ACT
recallmob BoneCaptain

[@rando7]
#ACT
recallmob EvilApe

[@rando8]
#ACT
recallmob StoneGriffin

[@rando9]
#ACT
recallmob MutantCaptain

[@rando10]
#ACT
recallmob ArmouredNuma

[@rando11]
#ACT
recallmob SpidBat

[@rando12]
#ACT
recallmob SnakeScorpion

[@rando13]
#ACT
recallmob GangSpider

[@rando14]
#ACT
recallmob SwordOma

[@rando15]
#ACT
recallmob Venoctopus

[@rando15]
#ACT
recallmob Minotaur

[@rando16]
#ACT
recallmob FlamingWooma

[@rando17]
#ACT
recallmob GhostRider

[@rando18]
#ACT
recallmob Ghoul 

[@rando19]
#ACT
recallmob kimo 

[@rando20]
#ACT
recallmob BoneElite 


;;Save
[@save]
#SAY
hi, would you like to store your pet before logging out?\\
<yes/@storebl>  --   <no/@exit>

[@storebl]
#IF
checkslavename BoneLord
#ACT
addnamelist ../defines/BoneLord.txt
goto @success
break

#ELSEACT
sendmsg 6 "Denied"

[@store]
#IF
checkslavename JinchonCaptain
#ACT
addnamelist ../defines/JinchonCaptain.txt
goto @success
break

#IF
checkslavename DarkDevil
#ACT
addnamelist ../defines/DarkDevil.txt
goto @success
break

#IF
checkslavename MinoTaurKing
#ACT
addnamelist ../defines/MinoTaurKing.txt
goto @success
break

#IF
checkslavename WoomaTaurus
#ACT
addnamelist ../defines/WoomaTaurus.txt
goto @success
break

#IF
checkslavename WhiteEvilBoar
#ACT
addnamelist ../defines/WhiteEvilBoar.txt
goto @success
break

#IF
checkslavename EvilSnake
#ACT
addnamelist ../defines/EvilSnake.txt
goto @success
break

#IF
checkslavename BoneLord
#ACT
addnamelist ../defines/BoneLord.txt
goto @success
break

#IF
checkslavename Khazard
#ACT
addnamelist ../defines/Khazard.txt
goto @success
break

#IF
checkslavename KingScorpion
#ACT
addnamelist ../defines/KingScorpion.txt
goto @success
break

#IF
checkslavename KingHog
#ACT
addnamelist ../defines/KingHog.txt
goto @success
break

#IF
checkslavename RedThunderZuma
#ACT
addnamelist ../defines/RedThunderZuma.txt
goto @success
break

#IF
checkslavename PossedGuardian
#ACT
addnamelist ../defines/PossedGuardian.txt
goto @success
break

#IF
checkslavename WoomaGuardian
#ACT
addnamelist ../defines/WoomaGuardian.txt
goto @success
break

#SAY
it seems you either dont have a pet or \
i cant store your pet sorry.\
<exit/@exit>

[@success]
#ACT
KICK 1
#SAY
i stored your pet so you will get it again after you relog.\
your pet will be level 0 sorry.\


[@freepet]
#IF
CHECKSLAVECOUNT < 1
#ACT
goto @freepet1
#ELSEACT
sendmsg 6 "Denied"
close

[@freepet1]
#IF
random 6
#ACT
recallmob OmaKing9 0 0 0 1
sendmsg 6 "Free pet obtained <$USERNAME> , take care of him!"
break
close

#IF
random 6
#ACT
recallmob MinotaurKing9 0 0 0 2
sendmsg 6 "Free pet obtained <$USERNAME> , take care of him!"
break
close

#IF
random 6
#ACT
recallmob AncientDemon9 0 0 0 3
sendmsg 6 "Free pet obtained <$USERNAME> , take care of him!"
break
close

#IF
random 6
#ACT
recallmob AncientDemon9 0 0 0 4
sendmsg 6 "Free pet obtained <$USERNAME> , take care of him!"
break
close

#IF
random 6
#ACT
recallmob OmaKing9 0 0 0 5
sendmsg 6 "Free pet obtained <$USERNAME> , take care of him!"
break
close

#IF
random 6
#ACT
recallmob MinotaurKing9 0 0 0 6
sendmsg 6 "Free pet obtained <$USERNAME> , take care of him!"
break
close

#ELSEACT
goto @freepet1